﻿Public Class frm_cuenta
    Public cue As cuenta
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Me.DialogResult = Windows.Forms.DialogResult.OK
        Dim res As cuenta = New cuenta()
        'Origen cuenta'
        res.ori_tipocuenta = Me.txt_ori_tcuenta.Text
        res.ori_banco = Me.txt_ori_banco.Text
        res.ori_numerocuenta = Me.txt_ori_nro_cuenta.Text
        'Destino cuenta'
        res.des_tipocuenta = Me.txt_des_tcuenta.Text
        res.des_banco = Me.txt_des_banco.Text
        res.des_numerocuenta = Me.txt_des_nro_cuenta.Text
        res.des_nombre = Me.txt_des_nombre.Text
        res.des_email = Me.txt_des_email.Text
        Me.cue = res
        Me.Close()
    End Sub
End Class